home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Users Group Library 1996 July / C-C++ Users Group Library July 1996.iso / vol_400 / 403_01 / materr.c < prev    next >
Text File  |  1992-05-23  |  966b  |  46 lines
  1. /*
  2. *-----------------------------------------------------------------------------
  3. *    file:    materr.c
  4. *    desc:    matrix error handler
  5. *    by:    ko shu pui, patrick
  6. *    date:    24 nov 91 v0.1
  7. *    revi:
  8. *    ref:
  9. *       [1] Mary L.Boas, "Mathematical Methods in the Physical Sciene,"
  10. *    John Wiley & Sons, 2nd Ed., 1983. Chap 3.
  11. *
  12. *    [2] Kendall E.Atkinson, "An Introduction to Numberical Analysis,"
  13. *    John Wiley & Sons, 1978.
  14. *
  15. *-----------------------------------------------------------------------------
  16. */
  17. #include <stdio.h>
  18.  
  19. #ifdef    __TURBOC__
  20. #include <alloc.h>
  21. #else
  22. #include <malloc.h>
  23. #endif
  24.  
  25. #include "matrix.h"
  26.  
  27. MATRIX mat_error( errno )
  28. int errno;
  29. {
  30.     switch( errno )
  31.         {
  32.         case MAT_MALLOC:
  33.             fprintf(stderr, "mat: malloc error\n" );
  34.             break;
  35.         case MAT_FNOTOPEN:
  36.             fprintf(stderr, "mat: fileopen error\n" );
  37.             break;
  38.         case MAT_FNOTGETMAT:
  39.             fprintf(stderr, "fgetmat: matrix read error\n");
  40.             break;
  41.         }
  42.  
  43.     return (NULL);
  44. }
  45.  
  46.